10 VRAM=679   :REM VIDEORAM
20 SRAM=683   :REM SCROLLBILDSCHIRM
30 SBREITE=685:REM BREITE
40 POKE VRAM   ,200:POKE VRAM+1   ,4
50 POKE SBREITE,120:POKE SBREITE+1,0
60 :
70 FOR X=4096 TO 4096+80
80 POKE SRAM  ,X-INT(X/256)*256
90 POKE SRAM+1,X/256
100 SYS 49152
110 NEXTX:GOTO20